home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
c
/
teglc.zip
/
SAMPROGS.ZIP
/
EASYTST1.C
< prev
next >
Wrap
Text File
|
1990-05-13
|
872b
|
42 lines
#include "teglsys.h"
unsigned easyquit(imagestkptr frame,msclickptr mouseclickpos)
{
if (getyesno(250,150,"Are you sure"))
abort_msg("Bye....");
return 1;
}
unsigned easyerror(imagestkptr frame,msclickptr mouseclickpos)
{
errmess(250,150,"Fake error occured in Programmer");
return 1;
}
unsigned easymessage(imagestkptr frame,msclickptr mouseclickpos)
{
framefromicon(frame,mouseclickpos,150,150,250,250);
prepareforupdate(stackptr);
frametext(stackptr,1,2,"First Line");
frametext(stackptr,2,2,"Second Line");
frametext(stackptr,3,2,"Third Line");
commitupdate();
return 1;
}
void main()
{
easytegl();
activebutton(100,100,"QUIT",easyquit);
activebutton(150,100,"ERROR",easyerror);
activebutton(220,100,"MESSAGE",easymessage);
teglsupervisor();
}